home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F32240_testFoldr.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2002-01-20  |  1.1 KB  |  37 lines
  1. <xsl:stylesheet version="1.0"
  2. xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  3. xmlns:msxsl="urn:schemas-microsoft-com:xslt"
  4. xmlns:saxon="http://icl.com/saxon"
  5. xmlns:foldr-func="foldr-func"
  6. exclude-result-prefixes="xsl foldr-func"
  7. >
  8.  
  9.    <xsl:import href="foldr.xsl"/>
  10.  
  11.    <!-- This transformation must be applied to:
  12.         numList.xml 
  13.      -->
  14.  
  15.    <foldr-func:foldr-func/>
  16.    <xsl:variable name="vFoldrFun" select="document('')/*/foldr-func:*[1]"/>
  17.     <xsl:output  encoding="UTF-8" omit-xml-declaration="yes"/>
  18.  
  19.     <xsl:template match="/">
  20.  
  21.       <xsl:call-template name="foldr">
  22.         <xsl:with-param name="pFunc" select="$vFoldrFun"/>
  23.         <xsl:with-param name="pList" select="/*/*"/>
  24.         <xsl:with-param name="pA0" select="0"/>
  25.       </xsl:call-template>
  26.     </xsl:template>
  27.  
  28.     <xsl:template match="*[namespace-uri() = 'foldr-func']">
  29.          <xsl:param name="arg1" select="0"/>
  30.          <xsl:param name="arg2" select="0"/>
  31.          
  32.          <xsl:value-of select="$arg1 + $arg2"/>
  33.     </xsl:template>
  34.  
  35. </xsl:stylesheet>
  36.  
  37.